home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: Alpha / Whiteline Alpha.iso / progtool / c / gcc / gpplib22.zoo / libsrc / error.cc < prev    next >
Encoding:
C/C++ Source or Header  |  1993-11-30  |  1.7 KB  |  60 lines
  1. /* 
  2. Copyright (C) 1990 Free Software Foundation
  3.     written by Doug Lea (dl@rocky.oswego.edu)
  4.  
  5. This file is part of the GNU C++ Library.  This library is free
  6. software; you can redistribute it and/or modify it under the terms of
  7. the GNU Library General Public License as published by the Free
  8. Software Foundation; either version 2 of the License, or (at your
  9. option) any later version.  This library is distributed in the hope
  10. that it will be useful, but WITHOUT ANY WARRANTY; without even the
  11. implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
  12. PURPOSE.  See the GNU Library General Public License for more details.
  13. You should have received a copy of the GNU Library General Public
  14. License along with this library; if not, write to the Free Software
  15. Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  16. */
  17.  
  18. #ifdef __GNUG__
  19. #pragma implementation
  20. #endif
  21. #include <builtin.h>
  22. #include <osfcn.h>
  23.  
  24. #ifdef __GNUC__
  25. typedef _VOLATILE_VOID (*NoReturnFunc)(void);
  26. /* Cast abort to a _VOLATILE_VOID function, even if <stdlib.h> differs.
  27. This is to avoid a warning from g++ that a `volatile' function does return. */
  28. #define ABORT() ((NoReturnFunc)abort)()
  29. #else
  30. #define ABORT abort()
  31. #endif
  32.  
  33. _VOLATILE_VOID default_one_arg_error_handler(const char* msg)
  34. {
  35.   fputs("Error: ", stderr);
  36.   fputs(msg, stderr);
  37.   fputs("\n", stderr);
  38.   ABORT();
  39. }
  40.  
  41.  
  42. _VOLATILE_VOID default_two_arg_error_handler(const char* kind, const char* msg)
  43. {
  44.   fputs(kind, stderr);
  45.   fputs(" Error: ", stderr);
  46.   fputs(msg, stderr);
  47.   fputs("\n", stderr);
  48.   ABORT();
  49. }
  50.  
  51. two_arg_error_handler_t lib_error_handler = default_two_arg_error_handler;
  52.  
  53. two_arg_error_handler_t set_lib_error_handler(two_arg_error_handler_t f)
  54. {
  55.   two_arg_error_handler_t old = lib_error_handler;
  56.   lib_error_handler = f;
  57.   return old;
  58. }
  59.  
  60.